A:Realizer.
Rplus?(A)
 (i:Id. R-has-loc(A;i) ~ (R-has-loc(Rplus-left(A);i)  R-has-loc(Rplus-right(A);i))) 

latex

Definitions

False, t  T, Id, x:A. B(x), P  Q, es realizer ind Rrframe compseq tag def, b, Rplus-right(x1), Rplus-left(x1), Rplus?(x1), es realizer ind Rbframe compseq tag def, es realizer ind Raframe compseq tag def, es realizer ind Rpre compseq tag def, es realizer ind Rsends compseq tag def, es realizer ind Reffect compseq tag def, es realizer ind Rsframe compseq tag def, es realizer ind Rframe compseq tag def, es realizer ind Rinit compseq tag def, True, p  q, R-has-loc(R;i), <a,b>, , s = t, {T}, SQType(T), s ~ t, es realizer ind Rplus compseq tag def, es realizer ind Rnone compseq tag def, x:AB(x), left+right, Unit, Knd, type List, IdLnk, Type, Prop, x:AB(x), State(ds), x. t(x), a:A fp B(a), DeclaredType(ds;x), rec(x.A(x)), Realizer

Lemmas

es realizer wf, unit wf, decl-type wf, fpf wf, decl-state wf, IdLnk wf, Knd wf, bool sq, Id wf, true wf, false wf